← Index
NYTProf Performance Profile   
For ../prof.pl
  Run on Wed Dec 14 15:33:55 2022
Reported on Wed Dec 14 15:40:04 2022

Filename(eval 324)[/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm:3]
StatementsExecuted 2240 statements in 21.3ms
Eval Invoked At/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm line 3
Sibling evals1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 112, 113
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
22301121.9ms68.8msJSON::Schema::Modern::::_get_format_validation JSON::Schema::Modern::_get_format_validation
1117µs19µsJSON::Schema::Modern::::BEGIN@5.180 JSON::Schema::Modern::BEGIN@5.180
1113µs3µsMethod::Generate::Accessor::_Generated::::BEGIN@10.181Method::Generate::Accessor::_Generated::BEGIN@10.181
Call graph for these subroutines as a Graphviz dot language file.
Line State
ments
Time
on line
Calls Time
in subs
Code
1{
221µs my $_QUOTED = ${$_[1]->{"\$_QUOTED"}};
311µs my $_UNQUOTED = ${$_[1]->{"\$_UNQUOTED"}};
4 package JSON::Schema::Modern;
5231µs231µs
# spent 19µs (7+12) within JSON::Schema::Modern::BEGIN@5.180 which was called: # once (7µs+12µs) by Sub::Quote::_clean_eval at line 5
no warnings 'closure';
# spent 19µs making 1 call to JSON::Schema::Modern::BEGIN@5.180 # spent 12µs making 1 call to warnings::unimport
6
# spent 68.8ms (21.9+46.9) within JSON::Schema::Modern::_get_format_validation which was called 2230 times, avg 31µs/call: # 2230 times (21.9ms+46.9ms) by JSON::Schema::Modern::Vocabulary::FormatAssertion::_eval_keyword_format at line 172 of JSON/Schema/Modern/Vocabulary/FormatAssertion.pm, avg 31µs/call
sub _get_format_validation {
7 ($_QUOTED,$_UNQUOTED) if 0;
8# BEGIN quote_sub PRELUDE
9package Method::Generate::Accessor::_Generated;
10
# spent 3µs within Method::Generate::Accessor::_Generated::BEGIN@10.181 which was called: # once (3µs+0s) by Sub::Quote::_clean_eval at line 15
BEGIN {
1110s $^H = 2018;
1211µs ${^WARNING_BITS} = "UUUUUUUUUUUUUUUUUUUU";
1312µs %^H = (
14 );
15131µs13µs}
16# END quote_sub PRELUDE
17223021.2ms669046.9msshift->_assert__format_validations->${\Data::Perl::Collection::Hash::MooseLike->can("get")}(@_); }
# spent 34.1ms making 2230 calls to Data::Perl::Collection::Hash::MooseLike::get, avg 15µs/call # spent 7.60ms making 2230 calls to JSON::Schema::Modern::_assert__format_validations, avg 3µs/call # spent 5.14ms making 2230 calls to UNIVERSAL::can, avg 2µs/call
1810s $$_UNQUOTED = \&_get_format_validation;
19}
2013µs1;
21
22;